home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1995 October
/
EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso
/
Aminet
/
gfx
/
fract
/
fu1_61.lha
/
Formulas
/
Silicium.Form
< prev
next >
Wrap
Text File
|
1994-12-01
|
269b
|
33 lines
Silicium
{
{
x1=-2.5
x2= 2.5
y1=-2.0
y2= 2.0
par1.r=1.0
par1.i=0.0
bailout=4.0
}
{
z=pixel
c=pixel
z2=par1/pixel
c2=par1/pixel
}
{
z=z*z
z=z+c
z2=z2*z2
z2=z2+c2
z3=z+z2
w=abs(z3)
}
{
w>bailout
}
{
PAR1-INVERSE FACTOR
}
}